home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 April: Mac OS SDK / Dev.CD Apr 96 SDK / Dev.CD Apr 96 SDK2.toast / Development Kits (Disc 2) / QuickTime / Programming Stuff / Documentation / develop articles / develop Issue 23 / QuickTime Music / BigEasy2.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-07-27  |  46.8 KB  |  2,380 lines  |  [TEXT/KAHL]

  1. /*
  2.     File:        BigEasy2.c
  3.  
  4.     Copyright:    © 1990-1992, 1994 by Apple Computer, Inc., all rights reserved.
  5.  
  6.     This file is used in these builds: Warhol
  7.  
  8.     Change History (most recent first):
  9.  
  10.         <41+>     22-9-94    dvb    universal headers    
  11.         <41>     22-9-94    dvb        
  12.         <40+>     17-8-94    dvb        allocate gx job when pagesetup, no sooner, coz its slow.
  13.         <40>     17-8-94    dvb        GX Printing
  14.         <39>      9-8-94    dvb        
  15.         <38>     27-7-94    dvb        installquititem
  16.         <37+>     5/27/94    dvb        InstallQuitItem
  17.         <37>     5/27/94    dvb        .
  18.         <35>      1/7/93    dvb        Compile under mpw.
  19.         <34>      1/6/93    dvb        Built in window-copy command.
  20.         <33>     4/23/92    dvb        Test checkout from new project
  21.         <32>     4/13/92    dvb        Pass activate/deactivates to back windows.
  22.         <31>     3/22/92    dvb        QuitApp message.
  23.         <30>     1/20/92    dvb        Cool new features. Much easier appleevents.
  24.         <29>    12/19/91    JB        removing think 4.0 code
  25.         <28>    10/14/91    JB        added #ifdef to create old window ports for debugging
  26.         <27>     9/18/91    PH        support silly disk inserted events
  27.         <26>     8/12/91    MD        support for timing profiler nastiness
  28.         <25>      7/3/91    PH        qd. is bad under old think
  29.         <24>     6/28/91    dvb        Make it work with/without MacHeaders in LSC5.
  30.         <23>      6/4/91    PH        compilin'
  31.         <22>      6/3/91    dvb        Just hackin.
  32.         <21>     5/28/91    JB        Added prototypes for BigEasy Proc Ptrs
  33.         <20>     5/27/91    PH        to compile again...
  34.         <19>     5/25/91    JB        OLD_THINK_C && TOOLBOX_LINKED
  35.         <18>     5/23/91    PH        changes for THINK 5
  36.         <17>     5/22/91    PH        new style prototypes
  37.         <16>      5/6/91    PH        nifty line after about...
  38.         <15>      5/5/91    dvb        Latest features, and App-Events for document open.
  39.        
  40.         <14>     4/25/91    JB        Changing to new THINK C interface files
  41.         <13>     4/19/91    PH        i like content clicks
  42.         <12>     4/19/91    dvb        Add WindowEventProc
  43.         <11>     3/29/91    PH        minor activate fix
  44.         <10>     3/29/91    dvb        Repair deactivate vs closewindow conflict, roll in latest cool
  45.                                     features.
  46.          <9>      3/9/91    dvb        Adjust to work with or without (LSC) mac headers
  47.          <8>      3/7/91    JB        Adjusting for using MacHeaders
  48.          <7>      3/1/91    dvb        Trivial new functions
  49.          <6>     2/24/91    dvb        Various cool new calls
  50.          <5>     2/18/91    dvb        Miscellaneous Updates
  51.          <4>      1/9/91    JB        Increasing ItemsPerMenu & #Menus
  52.          <3>    11/21/90    JB        Changes for INIT & mpw compatability
  53.          <2>    11/17/90    dvb        Pass on unused command-keys to document windows
  54.         <1>    11/17/90    dvb        New again after 1st CD pressing! Yay!
  55.  
  56.     To Do:
  57. */
  58.  
  59. /* file: BigEasy2.c
  60.   *
  61.   * Started 30 June 1988, more or less.
  62.   *
  63.   * A set of routines to allow the quick development
  64.   * of simple Macintosh applications.
  65.   * :)
  66.   */
  67.  
  68.  
  69. #define BigEasy2
  70.  
  71. #include <QuickDraw.h>
  72. #include <Gestalt.h>
  73. #include <Events.h>
  74. #include <AppleEvents.h>
  75. #include <Resources.h>
  76. #include <Menus.h>
  77. #include <ToolUtils.h>
  78. #include <Menus.h>
  79. #include <Windows.h>
  80. #include <Dialogs.h>
  81. #include <Memory.h>
  82. #include <devices.h>
  83. #include <Fonts.h>
  84. #include <Scrap.h>
  85. #include <SegLoad.h>
  86.  
  87. //#undef BigEasyGXPrinting
  88.  
  89. #ifdef BigEasyGXPrinting
  90.     #include <PrintingManager.h>
  91.     #include <Graphics Toolbox.h>
  92.     #include <Graphics Routines.h>
  93. #endif
  94.  
  95.  
  96.  
  97. /* #define THINK_C_PROFILE /* */
  98. #if defined(TIMING_PROFILE) || defined(STACK_KILLER)
  99.     #include "stack killer.h"
  100. #endif
  101.  
  102. #include "BigEasy2.h"
  103.  
  104.  
  105.  
  106. #ifdef BigEasyGXPrinting
  107.     #define WantsGX 1
  108. #else
  109.     #define WantsGX 0
  110. #endif
  111.  
  112. /*----------------
  113.     Limits
  114. ----------------*/
  115. #define kMMax 10            /* Number of menus in menubar */
  116. #define kMIMax 50            /* Number of items per menu */
  117. #define kMenuNameMax 32        /* Length of a menu title */
  118.  
  119. #define kStagLimX 97
  120. #define kStagLimY 37
  121.  
  122. /*----------------
  123.     Constants
  124. ----------------*/
  125. #define    kOSEvent                        app4Evt    /* event used by MultiFinder */
  126. #define    kSuspendResumeMessage            1        /* high byte of suspend/resume event message */
  127. #define    kResumeMask                    1        /* bit of message field for resume vs. suspend */
  128.  
  129. #define kWinPosType 'bewP'
  130. #define trapExitToShell 0xA9F4
  131.  
  132.  
  133.  
  134. /*----------------
  135.     Major BigEasy2 Structures
  136. ----------------*/
  137.  
  138. typedef struct TEasyWindow
  139.     {
  140.     Boolean wUsed;
  141.     long iNum;
  142.     long flags;
  143.     Boolean wGrowable;
  144.     beUpdateProcPtr wUpdateProc;
  145.     beClickProcPtr wClickProc;
  146.     beKeyProcPtr wKeyProc;
  147.     beGoAwayProcPtr wGoAwayProc;
  148.     beWNumCallProcPtr wZoomProc;
  149.     beActivateProcPtr wActivateProc;
  150.     beDeactivateProcPtr wDeactivateProc;
  151.     beIdleProcPtr wIdleProc;
  152.     beResizeProcPtr wResizeProc;
  153.     beGrowWindowProcPtr wGrowWindowProc;
  154.     beMoveWindowProcPtr wMoveWindowProc;
  155.     beEventProcPtr wEventProc;
  156.     WindowPtr wWindow;
  157. #ifdef BigEasyGXPrinting
  158.     gxJob job;
  159. #endif
  160.     } TEasyWindow;
  161.  
  162. typedef struct
  163.     {
  164.     short ref;
  165.     char mark;
  166.     char enable;
  167.     char cmdEquiv;
  168.     beMenuProcPtr proc;
  169.     } TEasyMenuItem;
  170.  
  171. /*----------------
  172.     Globals
  173. ----------------*/
  174. static short gIdleSeed;
  175. static Rect gResizeLim = {50,50,1000,1000};
  176. static TEasyWindow **gEasyWindowListH;            /* Handle to array of window objects    */
  177. static TEasyWindow *gEasyWindowList;            /* Pointer to array of window objects    */
  178. static short gEasyWindowListSize;                /* Number of window objects allocated    */
  179.  
  180. /*** Menus ***/
  181. static MenuHandle gMenuHandleList[kMMax];        /* MenuHandles indexed by MenuID's         */
  182. static short gMenuLength[kMMax];
  183. static char gMenuName[kMMax][kMenuNameMax];
  184. static TEasyMenuItem gMenu[kMMax][kMIMax];
  185. static short gMenuCount;                        /* How many menus defined */
  186. static short gCurrentMenu;                        /* the one to add to */
  187. static MenuHandle gMenuEdit;                    /* Which one is the edit menu? */
  188.  
  189. /*** Phantom Menu ***/
  190. static MenuHandle phantomMenuH = 0;
  191.  
  192. /*** About ***/
  193. static beAboutProcPtr gAboutProc;
  194. static char gAboutS0[256];
  195.  
  196. /*** Application Edit Commands ***/
  197. static beWNumCallProcPtr gAppUndoProc,gAppCutProc,gAppCopyProc,gAppPasteProc,gAppClearProc;
  198.  
  199. static beMenuProcPtr gAppPageSetupProc=0,gAppPrintProc=0;
  200.  
  201. /*** Global Status ***/
  202. static beOpenAppProcPtr gMasterOpenAppProc;
  203. static beOpenDocProcPtr gMasterOpenDocProc;
  204. static beQuitAppProcPtr gMasterQuitAppProc;
  205.  
  206. static beAboutProcPtr gMasterIdleProc;
  207. static short gStagX,gStagY;
  208. static WindowPtr gLastFrontIdle;
  209. static short gLastFrontWindowNumber;
  210. static short gSleep;
  211. static short gCoolDragState;
  212. static Point gCoolDragPoint;
  213. static short gCoolDragWindowNumber;
  214. static TEasyWindow *gCoolDragEW;
  215. static Boolean gInvalidMenuBar;
  216.  
  217. static void *gOldExitToShell;
  218.  
  219. PicHandle GetWindowPICT(TEasyWindow *thisEasyWindow);
  220.  
  221. /*----------------
  222.     Prototypes
  223. ----------------*/
  224. static void InitToolbox(void);
  225. static void CheckMenubar(void);
  226. static void EventLoop(void);
  227. static void InitBigEasy(void);
  228. static void ExitBigEasy(void);
  229. static void InstallMyExitToShell(void);
  230. static pascal void MyExitToShell(void);
  231. static void GetGrowRect(WindowPtr,Rect*);
  232. static void EnoughEasyWindows(short);
  233. static void FrontDAEdits(void);
  234. static TEasyWindow *GoodWNum(short);
  235. static Boolean CoolBigEasyCmdKeys(short key);
  236.  
  237. static void DoMyAbout(void);
  238. static void BEUndo(short);
  239. static void BECopy(short);
  240. static void BECut(short);
  241. static void BEPaste(short);
  242. static void BEClear(short);
  243. static void BENull(void);
  244. void BEPageSetup(short n, short menuItem, short menuRef);
  245. void BEPrint(short n, short menuItem, short menuRef);
  246.  
  247. static void MenuClick(Point p);
  248. static void DeleteIndexedMenuItem(short menu,short item);
  249. static Boolean DoKeyPress(long k);
  250. static void MenuPoint(long theclick);
  251. static void StartMenus(void);
  252. static short ScanWindowList(WindowPtr w);
  253. static void DoMouseClick(EventRecord *event);
  254. static void MyDrawGrowIcon(WindowPtr w);
  255.  
  256. static pascal OSErr BigEasyOpenAppThang(AppleEvent *theEvent, AppleEvent *reply,long refCon);
  257. static pascal OSErr BigEasyOpenDocThang(AppleEvent *theEvent, AppleEvent *reply,long refCon);
  258. static pascal OSErr BigEasyQuitAppThang(AppleEvent *theEvent, AppleEvent *reply,long refCon);
  259. static OSErr MissedAEParameters (AppleEvent *message);
  260.  
  261. Boolean ActivateWindow(WindowPtr w, Boolean activate);
  262.  
  263. #ifdef BigEasyGXPrinting
  264. void MakeSureWeHaveJob(TEasyWindow *thisWindow);
  265. #endif
  266.  
  267. void main(void);
  268.  
  269. /*----------------
  270.     Some useful routines
  271. ----------------*/
  272.  
  273. void InitToolbox(void)
  274.     {
  275.     InitGraf(&qd.thePort);
  276.     InitFonts();
  277.     FlushEvents(0xffff,0);
  278.     InitWindows();
  279.     InitMenus();
  280.     InitDialogs(0);
  281.     TEInit();
  282.     InitCursor();
  283.     }
  284.  
  285.  
  286. void GetGrowRect(WindowPtr w,Rect *r)
  287.     {
  288.     register Rect *gr;
  289.  
  290.     gr = r;
  291.     *gr = w->portRect;
  292.     gr->left = gr->right - 15;
  293.     gr->top = gr->bottom - 15;
  294.     }
  295.  
  296. void GoWatch(void)
  297.     {
  298.     SetCursor(*(Cursor**)GetCursor(4));
  299.     }
  300.  
  301. void GoArrow(void)
  302.     {
  303.     SetCursor(&qd.arrow);
  304.     }
  305.  
  306. void GoCursor(short c)
  307. /*
  308.   * Attempt to set to cursor ID c,
  309.   * but skip it if not there.
  310.   */
  311.     {
  312.     register Cursor **cur;
  313.  
  314.     cur = (Cursor **)GetCursor(c);
  315.     if(cur)
  316.         SetCursor(*cur);
  317.     }
  318.  
  319. static void EnoughEasyWindows(short n)
  320. /*
  321.   * If there are less than n window objects in the list,
  322.   * grow the handle appropriately.
  323.   */
  324.     {
  325.     short i;
  326.  
  327.     n++;
  328.     if(gEasyWindowListSize < n)
  329.         {
  330.         HUnlock((Handle)gEasyWindowListH);
  331.         SetHandleSize((Handle)gEasyWindowListH,sizeof(TEasyWindow) * (long)n);
  332.         HLock((Handle)gEasyWindowListH);
  333.         gEasyWindowList = *gEasyWindowListH;
  334.  
  335.         for(i = gEasyWindowListSize; i < n; i++)
  336.             gEasyWindowList[i].wUsed = 0;
  337.  
  338.         gEasyWindowListSize = n;
  339.         }
  340.     }
  341.  
  342. static TEasyWindow *GoodWNum(short n)
  343. /*
  344.   * return true if n is the number of an
  345.   * existing, used window.
  346.   */
  347.     {
  348.     register TEasyWindow *thisWindow;
  349.     if(n<0 || n>=gEasyWindowListSize)
  350.         return 0;
  351.     thisWindow = &gEasyWindowList[n];
  352.     if(thisWindow->wUsed)
  353.         return thisWindow;
  354.     else
  355.         return 0;
  356.     }
  357.  
  358.  
  359. static void FrontDAEdits(void)
  360. /*
  361.  * Check the front window. If it's a DA,
  362.  * enable all edit menu options.
  363.  */
  364.     {
  365.     WindowRecord *w;
  366.  
  367.     w = (WindowRecord*)FrontWindow();
  368.     if(w->windowKind < 0)                                    /* Any click in a DA window: */
  369.         EnDisEdits(1,1,1,1,1);                                /* enable edit menu. */
  370.     }
  371.  
  372.  
  373. void DoMyAbout(void)
  374.     {
  375.     DialogPtr d;
  376.     Handle h;
  377.     short hit;
  378.  
  379.     if(gAboutProc)
  380.         (*gAboutProc)();
  381.     else
  382.         {
  383.         h = GetResource('DLOG',1962);                            /* does it exist? */
  384.         if( (ResError()==0) && (h!=nil) )
  385.             {
  386.             ParamText((StringPtr)gAboutS0,0,0,0);
  387.             d = GetNewDialog(1962,0,(WindowPtr)-1);
  388.             ModalDialog(nil,&hit);
  389.             DisposDialog(d);
  390.             }
  391.         }
  392.     }
  393.  
  394. void SetMasterIdle(r)
  395.     beAboutProcPtr r;
  396.     {
  397.     gMasterIdleProc = r;
  398.     }
  399.  
  400. void SetWindowResizeProc(short n,beResizeProcPtr resizeProc)
  401. /*
  402.   * Sets the procedure which gets called when the window is resized
  403.   */
  404.     {
  405.     TEasyWindow *thisWindow;
  406.  
  407.     thisWindow = GoodWNum(n);
  408.     if(thisWindow)
  409.         thisWindow->wResizeProc = resizeProc;
  410.     }
  411.  
  412. void SetWindowGrowWindowProc(short n,beGrowWindowProcPtr growWindowProc)
  413. /*
  414.   * Sets the procedure which gets called when the window grows.
  415.   *   Allows alternate to GrowWindow.
  416.   */
  417.     {
  418.     TEasyWindow *thisWindow;
  419.  
  420.     thisWindow = GoodWNum(n);
  421.     if(thisWindow)
  422.         thisWindow->wGrowWindowProc = growWindowProc;
  423.     }
  424.  
  425. void SetWindowMoveProc(short n,beMoveWindowProcPtr moveWindowProc)
  426.     {
  427.     TEasyWindow *thisWindow;
  428.  
  429.     thisWindow = GoodWNum(n);
  430.     if(thisWindow)
  431.         thisWindow->wMoveWindowProc = moveWindowProc;
  432.     }
  433.  
  434.  
  435. void SetWindowZoomProc(short n,beWNumCallProcPtr zoomProc)
  436.     {
  437.     register TEasyWindow *thisWindow;
  438.  
  439.     thisWindow = GoodWNum(n);
  440.     if(thisWindow)
  441.         thisWindow->wZoomProc = zoomProc;
  442.     }
  443.  
  444. void SetWindowEventProc(short n,beEventProcPtr eventProc)
  445.     {
  446.     register TEasyWindow *thisWindow;
  447.  
  448.     thisWindow = GoodWNum(n);
  449.     if(thisWindow)
  450.         thisWindow->wEventProc = eventProc;
  451.     }
  452.  
  453. long GetWindowFlags(short n)
  454.     {
  455.     TEasyWindow *thisWindow;
  456.  
  457.     if(!(thisWindow = GoodWNum(n)))
  458.         return 0;
  459.  
  460.     return thisWindow->flags;
  461.     }
  462.  
  463. void SetWindowFlags(short n,long flags)
  464.     {
  465.     TEasyWindow *thisWindow;
  466.  
  467.     if(!(thisWindow = GoodWNum(n)))
  468.         return;
  469.  
  470.     thisWindow->flags = flags;
  471.     }
  472.  
  473. void SetAbout(StringPtr progName,StringPtr s0,beAboutProcPtr aboutProc)
  474. /*
  475.  * Sets the program's name in the about box, and
  476.  * sets the second string as ParamText 0 (^0)
  477.  * for the about dialog, 1962.
  478.  */
  479.     {
  480.     short i;
  481.     
  482.     SetItem(gMenuHandleList[1],1,(StringPtr)progName);
  483.  
  484.     for(i=0; i<256; i++)
  485.         gAboutS0[i] = *s0++;
  486.  
  487.     gAboutProc = aboutProc;
  488.     } 
  489.  
  490. /*----------------
  491.     Error Handling
  492. ----------------*/
  493.  
  494. void InstallMyExitToShell(void)
  495. /*
  496.   * Add my HatStrap call to
  497.   * the classic routine, "ExitToShell"
  498.   */
  499.     {
  500.     gOldExitToShell =  (void *) NGetTrapAddress(trapExitToShell, ToolTrap);
  501.     NSetTrapAddress((UniversalProcPtr) MyExitToShell, trapExitToShell, ToolTrap);
  502.     }
  503.  
  504. pascal void MyExitToShell(void)
  505. /*
  506.   * My exit routine, which does
  507.   * all the good cleanup.
  508.   */
  509.     {
  510.     Hatstrap();
  511.     NSetTrapAddress((UniversalProcPtr) gOldExitToShell, trapExitToShell, ToolTrap);
  512.     ExitToShell();
  513.     }    
  514.  
  515. void FailNil(long x)
  516. /*
  517.   * If x is zero, post an error
  518.   * alert and quit the program.
  519.   */
  520.     {
  521.     if(!x)
  522.         {
  523.         Alert(200,nil);
  524.         Debugger();
  525.         ExitToShell();
  526.         }
  527.     }
  528.  
  529. void FailOSErr(long x)
  530. /*
  531.   * If x isn't zero, post an error
  532.   * alert and quit the program.
  533.   */
  534.     {
  535.     if(x)
  536.         {
  537.         Debugger();
  538.         Alert(200,nil);
  539.         ExitToShell();
  540.         }
  541.     }
  542.  
  543. /*----------------
  544.     Some inherent methods
  545. ----------------*/
  546.  
  547. void BEUndo(short n)
  548.     {
  549.     if(!SystemEdit(0) && gAppUndoProc)
  550.         (*gAppUndoProc)(n);
  551.     }
  552.  
  553. void BECut(short n)
  554.     {
  555.     if(!SystemEdit(2) && gAppCutProc)
  556.         (*gAppCutProc)(n);
  557.     }
  558.  
  559. PicHandle GetWindowPICT(TEasyWindow *tew)
  560.     {
  561.     Rect visBounds;
  562.     beUpdateProcPtr fp;
  563.     PicHandle picH;
  564.  
  565.     SetPort(tew->wWindow);    /* Set port to window    */
  566.  
  567.     visBounds = qd.thePort->portRect;
  568.     InsetRect(&visBounds,-1,-1);
  569.     ForeColor(blackColor);
  570.     BackColor(whiteColor);
  571.     PenSize(1,1);
  572.  
  573.     picH = OpenPicture(&visBounds);
  574.     ClipRect(&visBounds);
  575.     FrameRect(&visBounds);
  576.  
  577.     fp = tew->wUpdateProc;
  578.     if(fp)
  579.         (*fp)(tew->iNum);                            /* Call drawing proc    */
  580.  
  581.     SetOrigin(0,0);
  582.  
  583.     ClosePicture();
  584.     ClipRect(&gBigRect);
  585.  
  586.     return picH;
  587.     }
  588.  
  589.  
  590. void BECopy(short n)
  591.     {
  592.     TEasyWindow *thisEasyWindow;
  593.  
  594.     if(!SystemEdit(3))
  595.         {
  596.         thisEasyWindow = GoodWNum(n);
  597.         if(thisEasyWindow->flags & wCopyDraw)
  598.             /*
  599.              * 
  600.              */
  601.             {
  602.             PicHandle picH;
  603.  
  604.             picH = GetWindowPICT(thisEasyWindow);
  605.  
  606.             HLock((Handle)picH);
  607.             ZeroScrap();
  608.             PutScrap(GetHandleSize((Handle)picH),'PICT',(Ptr)*picH);
  609.  
  610.             KillPicture(picH);
  611.             }
  612.         else if(gAppCopyProc)
  613.             (*gAppCopyProc)(n);
  614.         }
  615.     }
  616.  
  617. void BEPaste(short n)
  618.     {
  619.     if(!SystemEdit(4) && gAppPasteProc)
  620.         (*gAppPasteProc)(n);
  621.     }
  622.  
  623. void BEClear(short n)
  624.     {
  625.     if(!SystemEdit(5) && gAppClearProc)
  626.         (*gAppClearProc)(n);
  627.     }
  628.  
  629. void BENull(void){}
  630.  
  631.  
  632. void BEPageSetup(short n, short menuItem, short menuRef)
  633.     {
  634.     OSErr err;
  635.     long oldMenus;
  636.  
  637. #ifdef BigEasyGXPrinting
  638.     TEasyWindow *tew;
  639.     gxDialogResult result;
  640.     gxEditMenuRecord editMenuRec;
  641.  
  642.     tew = GoodWNum(n);
  643.     if(tew->flags & wPrintDraw)
  644.         {
  645.         oldMenus = DisableAllMenus();
  646.     
  647.         editMenuRec.editMenuID = 0;
  648.         editMenuRec.cutItem = 0; 
  649.         editMenuRec.copyItem = 0;
  650.         editMenuRec.pasteItem = 0;
  651.         editMenuRec.clearItem = 0;
  652.         editMenuRec.undoItem = 0;
  653.         
  654.         MakeSureWeHaveJob(tew);
  655.         result = GXJobDefaultFormatDialog(tew->job,&editMenuRec);
  656.         err = GXGetJobError(tew->job);
  657.     
  658.         EnableAllMenus(oldMenus);
  659.         }
  660.     else
  661. #endif
  662.         {
  663.         if(gAppPageSetupProc)
  664.             (*gAppPageSetupProc)(n,menuItem,menuRef);
  665.         }
  666.     }
  667.  
  668. void BEPrint(short n, short menuItem, short menuRef)
  669.     {
  670.     OSErr err;
  671.     PicHandle picH;
  672.     Rect pictR,centeredR,pageR;
  673.     Point p;
  674.     Str255 s;
  675.     long oldMenus;
  676.  
  677. #ifdef BigEasyGXPrinting
  678.     TEasyWindow *tew;
  679.     gxFormat format;
  680.     gxTranslationStatistic stats;
  681.     gxRectangle pageSize,paperSize;
  682.     gxDialogResult result;
  683.     gxEditMenuRecord editMenuRec;
  684.     gxShape sh;
  685.  
  686.     tew = GoodWNum(n);
  687.     if(tew->flags & wPrintDraw)
  688.         {
  689.         oldMenus = DisableAllMenus();
  690.     
  691.         editMenuRec.editMenuID = 0;
  692.         editMenuRec.cutItem = 0; 
  693.         editMenuRec.copyItem = 0;
  694.         editMenuRec.pasteItem = 0;
  695.         editMenuRec.clearItem = 0;
  696.         editMenuRec.undoItem = 0;
  697.         
  698.         MakeSureWeHaveJob(tew);
  699.         result = GXJobPrintDialog(tew->job,&editMenuRec);
  700.         err = GXGetJobError(tew->job);
  701.     
  702.         picH = GetWindowPICT(tew);
  703.     
  704.         pictR = (**picH).picFrame;
  705.         p.h = p.v = 0;
  706.  
  707.         /*
  708.           * Center the image in the page rectangle
  709.           */
  710.         format = GXGetJobFormat(tew->job,1);
  711.         GXGetFormatDimensions(format,&pageSize,&paperSize);
  712.         pageR.top = pageSize.top >> 16;
  713.         pageR.bottom = pageSize.bottom >> 16;
  714.         pageR.left = pageSize.left >> 16;
  715.         pageR.right = pageSize.right >> 16;
  716.         centeredR = pictR;
  717.         OffsetRect(¢eredR,
  718.                 (pageR.left + pageR.right - pictR.left - pictR.right + 1) >> 1,
  719.                 (pageR.top + pageR.bottom - pictR.top - pictR.bottom + 1) >> 1);
  720.     
  721.         sh = GXConvertPICTToShape(picH, gxDefaultOptionsTranslation, &pictR, ¢eredR, p, nil, &stats);
  722.     
  723.         GetWTitle(tew->wWindow,s);
  724.     
  725.         GXStartJob(tew->job,s,0);
  726.         err = GXGetJobError(tew->job);
  727.         GXPrintPage(tew->job,1,nil,sh);
  728.         err = GXGetJobError(tew->job);
  729.         GXFinishJob(tew->job);
  730.         err = GXGetJobError(tew->job);
  731.         GXDisposeShape(sh);
  732.     
  733.         EnableAllMenus(oldMenus);
  734.         }
  735. #endif
  736.         {
  737.         if(gAppPageSetupProc)
  738.             (*gAppPageSetupProc)(n,menuItem,menuRef);
  739.         }
  740.     }
  741.  
  742.  
  743. /*----------------
  744.     Menu Action Routines
  745. ----------------*/
  746.  
  747. Boolean DoKeyPress(long k)
  748.     {
  749.     register long thePoint;
  750.     register Boolean didIt;
  751.  
  752.     thePoint = MenuKey((char)k);
  753.     didIt = (thePoint>>16) != 0;
  754.     if(didIt)
  755.         MenuPoint(thePoint);
  756.  
  757.     return didIt;
  758.     }
  759.     
  760. void MenuClick(Point p)
  761.     {
  762.     KeyMap     theKeys;
  763.     Boolean    putBack = false;
  764.     short    oldID;
  765.     
  766.     if (phantomMenuH) {
  767.     GetKeys(theKeys);
  768.         
  769.         if ((theKeys[1]&4) == 0) {
  770.             putBack = true;
  771.             oldID = (**phantomMenuH).menuID;
  772.             DeleteMenu( oldID );
  773.             }
  774.         }
  775.     MenuPoint(MenuSelect(p));
  776.     if (putBack)
  777.         {
  778.         InsertMenu(phantomMenuH,oldID);
  779.         }
  780.     }
  781.  
  782. void MenuPoint(long theclick)
  783.     {
  784.     register short mID,mItem;
  785.     char DAname[30];
  786.     short wNum;
  787.     TEasyWindow *thisWindow;
  788.     register beMenuProcPtr aProc;
  789.     register TEasyMenuItem *emi;
  790.  
  791.     mID = theclick>>16;
  792.     mItem = theclick & 0xffff;
  793.  
  794.     if(mID == 0) return;
  795.  
  796.     if(mID == 1)                            /* Apple menu */
  797.         {
  798.         if(mItem == 1)                        /* Its either the about box */
  799.             DoMyAbout();
  800.         else    
  801.             {                                    /* Or a DA */
  802.             GetItem(gMenuHandleList[1],mItem,(StringPtr)DAname);
  803.             OpenDeskAcc((StringPtr)DAname);
  804.             }
  805.         }
  806.     else
  807.         {
  808.         wNum = gLastFrontWindowNumber;
  809.         thisWindow = GoodWNum(wNum);
  810.         if(thisWindow)                                    /* if one of our window in front, setport    */
  811.             SetPort(thisWindow->wWindow);
  812.  
  813.         emi = &gMenu[mID][0];
  814.         aProc = emi->proc;
  815.         if(aProc)                                        /* call the menu's routine, if any        */
  816.             (*aProc)(wNum,mItem,gMenu[mID][mItem].ref);
  817.  
  818.         emi = &gMenu[mID][mItem];
  819.         aProc = emi->proc;
  820.         if(aProc)                                        /* call the item's routine, if any        */
  821.             (*aProc)(wNum,mItem,emi->ref);
  822.         }
  823.  
  824.     HiliteMenu(0);
  825.     }
  826.  
  827. char dAbout[] = "\pAbout ";
  828.  
  829. void StartMenus(void)
  830. /*
  831.  * Start with just an About box, and some DA's.
  832.  */
  833.     {
  834.     char aboutS[255];
  835.     MenuHandle applemenu;
  836.  
  837.     BlockMove(&dAbout[0],aboutS,dAbout[0]+1);            /* "About" */
  838.     BlockMove((StringPtr )0x910 + 1,aboutS + aboutS[0] + 1, *(StringPtr )0x910); /* ProgName */
  839.     aboutS[0] += *((StringPtr )0x910);
  840.     aboutS[aboutS[0] + 1] = '…';
  841.     aboutS[0]++;
  842.  
  843.     applemenu = NewMenu(1,(StringPtr)"\p");                /* Apple menu: ID 1                    */
  844.     AppendMenu(applemenu,(StringPtr)aboutS);
  845.     AppendMenu(applemenu,(StringPtr)"\p(-");
  846.     AddResMenu(applemenu,'DRVR');
  847.     InsertMenu(applemenu,0);
  848.     DrawMenuBar();
  849.     gMenuHandleList[1] = applemenu;
  850.     gMenu[1][0].enable = true;
  851.  
  852.     gMenuCount = 1;                        /* Next menu added will be ID 2        */
  853.     gCurrentMenu = 1;
  854.     gMenuLength[1] = 0;                    /* No items, really, in Apple menu        */
  855.     }
  856.  
  857. MenuHandle InstallMenu(StringPtr s,beMenuProcPtr action,short ref)
  858. /*
  859.  * Start a new menu with name s
  860.  */
  861.     {
  862.     register TEasyMenuItem *emi;
  863.     register MenuHandle mh;
  864.  
  865.     gMenuCount++;                                /* new menu                        */
  866.     gCurrentMenu = gMenuCount;
  867.  
  868.     if(*s > kMenuNameMax-1)
  869.         *s = kMenuNameMax-1;
  870.  
  871.     gMenuLength[gCurrentMenu] = 0;
  872.     mh = NewMenu(gCurrentMenu,(StringPtr)s);
  873.     gMenuHandleList[gCurrentMenu] = mh;
  874.     InsertMenu(mh,0);
  875.  
  876.     emi = &gMenu[gCurrentMenu][0];
  877.     emi->enable = ref >= 0;
  878.     if(!emi->enable)
  879.         {
  880.         DisableItem(mh,0);
  881.         ref =- ref;
  882.         }
  883.     emi->proc = action;
  884.     emi->ref = ref;
  885.  
  886.     gInvalidMenuBar = true;                    /* redraw soon */
  887.     BlockMove(s,gMenuName[gCurrentMenu],*s+1);
  888.     return mh;
  889.     }
  890.  
  891. static Str255 dQuitString = "\pQuit ";
  892. #define kQuitLength 5
  893. static Str15 dQuitCmdKey = "\p/Q";
  894.  
  895. void InstallQuitItem(beMenuProcPtr action,short ref)
  896.     {
  897.     short i,j;
  898.     StringPtr w;
  899.  
  900.     i = kQuitLength;
  901.  
  902.     w = (StringPtr)0x910;
  903.     j = *w++;
  904.     while(j--)
  905.         dQuitString[++i] = *w++;
  906.  
  907.     w = dQuitCmdKey;
  908.     j = *w++;
  909.     while(j--)
  910.         dQuitString[++i] = *w++;
  911.  
  912.     dQuitString[0] = i;
  913.  
  914.     InstallMenuItem(dQuitString,action,ref);
  915.     }
  916.  
  917.  
  918.  
  919. void InstallMenuItem(StringPtr s,beMenuProcPtr action,short ref)
  920. /*
  921.  * Add an item to the last menu, and associate a routine with it.
  922.  */
  923.     {
  924.     register MenuHandle mh;
  925.     register TEasyMenuItem *emi;
  926.     register short item;
  927.  
  928.  
  929.     mh = gMenuHandleList[gCurrentMenu];
  930.     gMenuLength[gCurrentMenu]++;
  931.     item = gMenuLength[gCurrentMenu];
  932.     emi = &gMenu[gCurrentMenu][item];
  933.  
  934.     if (ref < 0)
  935.         {
  936.         DisableItem(mh,item);
  937.         ref =- ref;
  938.         emi->enable = 0;
  939.         }
  940.     else
  941.         emi->enable = 1;
  942.  
  943.     AppendMenu(mh,(StringPtr)s);
  944.     emi->proc = action;
  945.     emi->ref = ref;
  946.     emi->mark = 0;
  947.     if(*(s+*s-1) == '/')
  948.         emi->cmdEquiv = *(s+*s);
  949.     else
  950.         emi->cmdEquiv = 0;
  951.     }
  952.  
  953. void RemoveMenuItem(short ref)
  954. /*
  955.  * Remove all menu items with
  956.  * refcon ref.
  957.  */
  958.     {
  959.     short menu;
  960.     short item;
  961.  
  962.     for(menu = 1; menu <= gMenuCount; menu++)
  963.         for(item = gMenuLength[menu]; item > 0; item--)
  964.             {
  965.             if(gMenu[menu][item].ref == ref)
  966.                 DeleteIndexedMenuItem(menu,item);
  967.             }
  968.     }
  969.  
  970. void DeleteIndexedMenuItem(short menu,short item)
  971.     {
  972.     StringPtr oldStrings;
  973.     MenuHandle mh;
  974.     short i;
  975.     short itemCount;
  976.     register TEasyMenuItem *emi;
  977.     register StringPtr w;
  978.  
  979.     itemCount = gMenuLength[menu];
  980.     mh = gMenuHandleList[menu];
  981.     oldStrings = (StringPtr)NewPtrClear(256 * (itemCount));
  982.     FailNil((long)oldStrings);
  983.  
  984.     for(i = 1; i<=itemCount; i++)
  985.         GetItem(mh,i,(StringPtr)&oldStrings[(i-1)*256]);
  986.  
  987.     DeleteMenu(menu);
  988.     DisposeMenu(mh);
  989.  
  990.     mh = NewMenu(menu,(StringPtr)gMenuName[menu]);
  991.     emi = &gMenu[menu][1];
  992.     w = oldStrings;
  993.     for(i = 1; i<=itemCount; i++)
  994.         {
  995.         if(i != item)
  996.             {
  997.             if(emi->cmdEquiv)
  998.                 {
  999.                 *(w+*w+1) = '/';
  1000.                 *(w+*w+2) = emi->cmdEquiv;
  1001.                 *w = *w + 2;
  1002.                 }
  1003.             AppendMenu(mh,(StringPtr)w);
  1004.             }
  1005.         emi++;
  1006.         w += 256;
  1007.         }
  1008.  
  1009.     emi = &gMenu[menu][item];
  1010.     for(i = item; i<itemCount; i++)
  1011.         {
  1012.         *emi = *(emi+1);
  1013.         emi++;
  1014.         }
  1015.  
  1016.     gMenuLength[menu]--;
  1017.     itemCount--;
  1018.  
  1019.     emi = &gMenu[menu][1];
  1020.     for(i = 1; i<=itemCount; i++)
  1021.         {
  1022.         if(!emi->enable)
  1023.             DisableItem(mh,i);
  1024.         if(emi->mark)
  1025.             SetItemMark(mh,i,emi->mark);
  1026.         emi++;
  1027.         }
  1028.  
  1029.     InsertMenu(mh,menu+1);
  1030.     DisposPtr((Ptr)oldStrings);
  1031.     }
  1032.  
  1033. void InstallEditMenu(beWNumCallProcPtr Xundo,
  1034.         beWNumCallProcPtr Xcut,
  1035.         beWNumCallProcPtr Xcopy,
  1036.         beWNumCallProcPtr Xpaste,
  1037.         beWNumCallProcPtr Xclear)
  1038.     /*
  1039.      * Start an edit menu, and put the first six things in.
  1040.      */
  1041.     {
  1042.     gAppUndoProc = Xundo;
  1043.     gAppCutProc = Xcut;
  1044.     gAppCopyProc = Xcopy;
  1045.     gAppPasteProc = Xpaste;
  1046.     gAppClearProc = Xclear;
  1047.  
  1048.     InstallMenu("\pEdit",nil,0);
  1049.     InstallMenuItem("\px/Z",(beMenuProcPtr)BEUndo,-mUndo);            /* barfs because it is static */
  1050.     InstallMenuItem("\p(-",(beMenuProcPtr)BENull,0);
  1051.     InstallMenuItem("\px/X",(beMenuProcPtr)BECut,-mCut);
  1052.     InstallMenuItem("\px/C",(beMenuProcPtr)BECopy,-mCopy);
  1053.     InstallMenuItem("\px/V",(beMenuProcPtr)BEPaste,-mPaste);
  1054.     InstallMenuItem("\px/B",(beMenuProcPtr)BEClear,-mClear);
  1055.  
  1056.     gMenuEdit = gMenuHandleList[gCurrentMenu];
  1057.  
  1058.     EnDisEdits(-1,-1,-1,-1,-1);
  1059.     }
  1060.  
  1061. void InstallPrintItems(beMenuProcPtr pageSetup,beMenuProcPtr print)
  1062.     {
  1063.     gAppPageSetupProc = pageSetup;
  1064.     gAppPrintProc = print;
  1065.  
  1066.     InstallMenuItem("\pPage Setup…/π",(beMenuProcPtr)BEPageSetup,-mPageSetup);
  1067.     InstallMenuItem("\pPrint…/P",(beMenuProcPtr)BEPrint,-mPrint);
  1068.     }
  1069.  
  1070. void SetMenuItem(short ref,char enable,char isMarked,char mark,StringPtr s)
  1071. /*
  1072.   * Set all items with the reference number to the
  1073.   * enable/disable state, with mark, and name s.
  1074.   * pass enable + to enable, - to disable, and
  1075.   * zero to leave alone.
  1076.   */
  1077.     {
  1078.     short m,i;
  1079.     MenuHandle mh;
  1080.     register TEasyMenuItem *emi;
  1081.  
  1082.     for(m=1; m<=gMenuCount; m++)
  1083.         {
  1084.         mh = gMenuHandleList[m];
  1085.         for(i=gMenuLength[m]; i>=0; i--)
  1086.             {
  1087.             emi = &gMenu[m][i];
  1088.             if(emi->ref == ref)
  1089.                 {
  1090.                 if(enable)
  1091.                     {
  1092.                     if(!i)
  1093.                         gInvalidMenuBar = true;
  1094.                     if(enable > 0)
  1095.                         {
  1096.                         emi->enable = 1;
  1097.                         EnableItem(mh,i);
  1098.                         }
  1099.                     else
  1100.                         {
  1101.                         emi->enable = 0;
  1102.                         DisableItem(mh,i);
  1103.                         }
  1104.                     }
  1105.                 if(i > 0)                    /* these only apply to items */
  1106.                     {
  1107.                     if(isMarked)
  1108.                         if(isMarked > 0)
  1109.                             {
  1110.                             emi->mark = mark;
  1111.                             SetItemMark(mh,i,mark);
  1112.                             //CheckItem(mh,i,true);
  1113.                             }
  1114.                         else
  1115.                             {
  1116.                             emi->mark = 0;
  1117.                             SetItemMark(mh,i,0);
  1118.                             }
  1119.                     if(s)
  1120.                         SetItem(mh,i,(StringPtr)s);
  1121.                     }
  1122.                 }
  1123.             }
  1124.         }
  1125.     }
  1126.  
  1127.  
  1128.  
  1129. void EnDisEdits(short Eundo,short Ecut,short Ecopy,short Epaste,short Eclear)
  1130. /*
  1131.  * For each edit menu entry,
  1132.  * -1=disable, 1=enable, 0=leave alone.
  1133.  */
  1134.     {
  1135.     SetMenuItem(mUndo,Eundo,false,0,"\pUndo");
  1136.     SetMenuItem(mCut,Ecut,false,0,"\pCut");
  1137.     SetMenuItem(mCopy,Ecopy,false,0,"\pCopy");
  1138.     SetMenuItem(mPaste,Epaste,false,0,"\pPaste");
  1139.     SetMenuItem(mClear,Eclear,false,0,"\pClear");
  1140.     }
  1141.  
  1142. MenuHandle SetCurrentMenu(short ref)
  1143. /*
  1144.  * Set which menu will take
  1145.  * future "InstallMenuItem"s.
  1146.  */
  1147.     {
  1148.     register short i;
  1149.  
  1150.     for(i = 0; i<gMenuCount; i++)
  1151.         {
  1152.         if(gMenu[i][0].ref == ref)
  1153.             {
  1154.             gCurrentMenu = i;
  1155.             return gMenuHandleList[i];
  1156.             }
  1157.         }
  1158.     return 0;
  1159.     }
  1160.  
  1161. long DisableAllMenus(void)
  1162. /*
  1163.  * Disable all menus, as for a modal dialog,
  1164.  * and return a long with the masks of which should get reenabled.
  1165.  */
  1166.     {
  1167.     long result;
  1168.     long mask;
  1169.     TEasyMenuItem *emi;
  1170.     short i;
  1171.  
  1172.     result = 0;
  1173.     mask = 1;
  1174.     for(i = 0; i<kMMax; i++)
  1175.         {
  1176.         emi = &gMenu[i][0];
  1177.         if(emi->enable)
  1178.             {
  1179.             DisableItem(gMenuHandleList[i],0);
  1180.             result |= mask;
  1181.             }
  1182.         mask <<= 1;
  1183.         }
  1184.     DrawMenuBar();
  1185.     return result;
  1186.     }
  1187.  
  1188. void EnableAllMenus(long saveMenus)
  1189. /*
  1190.  * Enable menus according to the mask returned by DisableAllMenus().
  1191.  */
  1192.     {
  1193.     long mask;
  1194.     short i;
  1195.  
  1196.     mask = 1;
  1197.     for(i = 0; i<kMMax; i++)
  1198.         {
  1199.         if(saveMenus & mask)
  1200.             EnableItem(gMenuHandleList[i],0);
  1201.         mask <<= 1;
  1202.         }
  1203.     DrawMenuBar();
  1204.     }
  1205.  
  1206.  
  1207. short ScanWindowList(WindowPtr w)
  1208. /*
  1209.   * return a window number from a WindowPeek,
  1210.   * or -1 if no known window.
  1211.   */
  1212.     {
  1213.     short i;
  1214.     TEasyWindow *wo;
  1215.  
  1216.     wo= &gEasyWindowList[0];
  1217.  
  1218.     for(i=0; i<gEasyWindowListSize; i++)
  1219.         {
  1220.         if (wo->wUsed && (wo->wWindow==w))
  1221.             return i;
  1222.         wo++;
  1223.         }
  1224.     return -1;
  1225.     }
  1226.  
  1227.  
  1228. /*----------------
  1229.     Mouse Action Routines
  1230. ----------------*/
  1231. void DoMouseClick(EventRecord *event)
  1232.     {
  1233.     WindowPtr w;
  1234.     short part;
  1235.     register short wNum;
  1236.     register TEasyWindow *thisEasyWindow;
  1237.     Point p;
  1238.     Rect r;
  1239.     Boolean tookEvent;
  1240.  
  1241.     p = event->where;
  1242.     part = FindWindow (p, &w);
  1243.     wNum = ScanWindowList(w);
  1244.     thisEasyWindow = GoodWNum(wNum);
  1245.  
  1246.     switch (part)
  1247.         {
  1248.         case inDesk:
  1249.             break;
  1250.  
  1251.         case inMenuBar:
  1252.             MenuClick(p);
  1253.             break;
  1254.         
  1255.         case inSysWindow:
  1256.             SystemClick(event,w);
  1257.             break;
  1258.         
  1259.         case inContent:
  1260.         contentClick:
  1261.             if (w != FrontWindow())                /* If clicked on a non-front window, */
  1262.                 SelectWindow(w);                            /* bring it to the front. */
  1263.             else if(thisEasyWindow)                            /* Click on front window: give click */
  1264.                 {                                        /* to window's click routine. */
  1265.                 SetPort(w);
  1266.                 GlobalToLocal(&p);
  1267.  
  1268.                 ClipRect(&gBigRect);
  1269.                 SetOrigin(0,0);
  1270.  
  1271.                 if(thisEasyWindow && thisEasyWindow->wEventProc)
  1272.                     (*thisEasyWindow->wEventProc)(wNum,event,&tookEvent);
  1273.                 else
  1274.                     tookEvent = false;
  1275.  
  1276.                 if(!tookEvent)
  1277.                     {
  1278.                     register beClickProcPtr fp;
  1279.  
  1280.                     fp = thisEasyWindow->wClickProc;
  1281.                     if(fp)
  1282.                         (*fp)(wNum,p,
  1283.                                 event->modifiers);
  1284.                     }
  1285.                 }
  1286.             break;
  1287.  
  1288.         case inDrag:
  1289.             if(((thisEasyWindow->flags & wCoolDrag)!=0)
  1290.                     ^ ((event->modifiers & optionKey)!=0))
  1291.                 {
  1292.                 gCoolDragPoint = event->where;
  1293.                 gCoolDragState = 1;
  1294.                 gCoolDragEW = thisEasyWindow;
  1295.                 gCoolDragWindowNumber = wNum;
  1296.                 if(!(event->modifiers & 256))
  1297.                     SelectWindow(w);
  1298.                 }
  1299.             else
  1300.                 if(Button())                                /* for quick title-bar clicks */
  1301.                     {
  1302.                     beMoveWindowProcPtr fp;
  1303.  
  1304.                     DragWindow(w,event->where,&gBigRect);
  1305.                     fp = thisEasyWindow->wMoveWindowProc;
  1306.                     if(fp)
  1307.                         (fp)(wNum);                    
  1308.                     }
  1309.                 else
  1310.                     SelectWindow(w);
  1311.             break;
  1312.  
  1313.         case inGrow:
  1314.             if(thisEasyWindow && (thisEasyWindow->flags & wGrowable))
  1315.                 {
  1316.                 long oldSize,newSize;
  1317.                 beGrowWindowProcPtr fp;
  1318.                 beResizeProcPtr rsfp;
  1319.                 
  1320.                 SetPort(w);
  1321.                 GetGrowRect(w,&r);
  1322.                 InvalRect(&r);
  1323.  
  1324.                 fp = thisEasyWindow->wGrowWindowProc;
  1325.                 if(fp)
  1326.                     (*fp)(&newSize,wNum,w,event->where,&gResizeLim);
  1327.                 else
  1328.                     newSize = GrowWindow(w,event->where,&gResizeLim);
  1329.  
  1330.                 if(newSize)
  1331.                     {
  1332.                     rsfp = thisEasyWindow->wResizeProc;
  1333.                     if(rsfp)
  1334.                         {
  1335.                         oldSize = ((long)(w->portRect.bottom-w->portRect.top)<<16) |
  1336.                                 (w->portRect.right-w->portRect.left);
  1337.                         (*rsfp)(wNum,(Point *)&oldSize,(Point *)&newSize,event->modifiers);
  1338.                         }
  1339.                     else
  1340.                         SizeWindow(w,newSize&0xffff,newSize>>16,1);
  1341.                     GetGrowRect(w,&r);
  1342.                     InvalRect(&r);
  1343.                     }
  1344.                 }
  1345.             else
  1346.                 goto contentClick;
  1347.             break;
  1348.  
  1349.         case inGoAway:
  1350.             if(thisEasyWindow)
  1351.                 if (TrackGoAway(w,event->where))
  1352.                     {
  1353.                     beGoAwayProcPtr fp;
  1354.                     
  1355.                     fp = thisEasyWindow->wGoAwayProc;
  1356.                     if(fp)
  1357.                         (*fp)(wNum);
  1358.                     }
  1359.             break;
  1360.  
  1361.         /*
  1362.          * The following way to handle zoom only
  1363.          * applies to zooming to 1 state.  This does
  1364.          * not handle zooming in and out between 2
  1365.          * states.  Check IM IV.
  1366.          */
  1367.  
  1368.         case inZoomIn:    /* zoomBox */
  1369.         case inZoomOut:
  1370.             if(thisEasyWindow)
  1371.                 {
  1372.                 if (TrackBox(w,event->where,part))
  1373.                     {
  1374.                     beWNumCallProcPtr fp;
  1375.                     
  1376.                     fp = thisEasyWindow->wZoomProc;
  1377.                     if(fp)
  1378.                         (*fp)(wNum);
  1379.                     }
  1380.                 }
  1381.             break;
  1382.         }
  1383.     }
  1384.  
  1385. /*----------------
  1386.     Window Action Routines
  1387. ----------------*/
  1388.  
  1389. WindowPtr InstallWindow(short iNum,StringPtr iTitle,Rect *iRect,short iType,short iFlags,
  1390.         beUpdateProcPtr iUpdate,beClickProcPtr iClick,beKeyProcPtr iKey,beGoAwayProcPtr iGoAway,
  1391.         beActivateProcPtr iActivate,beDeactivateProcPtr iDeactivate,beIdleProcPtr iIdle)
  1392. /*
  1393.  * Add a window to BigEasy's list. If the window is
  1394.  * already up somewhere, bring it to the front and
  1395.  * visualize it.
  1396.  */
  1397.     {
  1398.     TEasyWindow *thisWindow;
  1399.     Rect stagRect,**oldPos;
  1400.     Boolean isVisible;
  1401.     RgnHandle rh;
  1402.     KeyMap km;
  1403.     Boolean opt;
  1404.  
  1405.     GetKeys(km);
  1406.  
  1407.     opt =km[58/8] &  (1<< (58%8) );
  1408.  
  1409.     isVisible = iNum>0;
  1410.     if(!isVisible)
  1411.         iNum = -iNum;
  1412.  
  1413.     EnoughEasyWindows(iNum);            /* Make sure there's space for new one        */
  1414.     thisWindow = &gEasyWindowList[iNum];
  1415.  
  1416.     if (thisWindow->wUsed)                /* something already assigned to this window? */
  1417.         {
  1418.         Show(iNum);
  1419.         goto goHome;
  1420.         }
  1421.  
  1422.     oldPos = (Rect **)Get1Resource(kWinPosType,iNum);    /* attempt to find saved window position        */
  1423.     stagRect = *iRect;
  1424.  
  1425.     if(oldPos && !opt)                                    /* (option key "forgets" old window */
  1426.         OffsetRect(&stagRect,
  1427.                 (**oldPos).left - stagRect.left,(**oldPos).top - stagRect.top);
  1428.  
  1429.         {
  1430.         Rect lilRect;
  1431.  
  1432.         lilRect.top = stagRect.top - 10;
  1433.         lilRect.left = stagRect.left + 4;
  1434.         lilRect.bottom = lilRect.top + 1;
  1435.         lilRect.right = lilRect.left + 1;
  1436.  
  1437.         rh = NewRgn();
  1438.         RectRgn(rh,&lilRect);
  1439.         SectRgn(rh,*(RgnHandle *)0x9EE,rh);
  1440.         if(EmptyRgn(rh) && gWindowsInView)
  1441.             OffsetRect(&stagRect,50 - iRect->left,80 - iRect->top);
  1442.  
  1443.         if(gStaggerWindows)
  1444.             {
  1445.             gStagX = (gStagX + gStagStepX)%kStagLimX;
  1446.             gStagY = (gStagY + gStagStepY)%kStagLimY;
  1447.             OffsetRect(&stagRect,gStagX,gStagY);
  1448.             }
  1449.         DisposeRgn(rh);
  1450.         }
  1451.  
  1452.     thisWindow->wUsed = 1;
  1453.  
  1454.     if(gHasColor)
  1455.         thisWindow->wWindow = NewCWindow(0,&stagRect,(StringPtr)iTitle,isVisible,
  1456.                 ((iFlags & wZoomable) != 0) ? zoomDocProc : iType,
  1457.                 (WindowPtr)-1,iGoAway!=0,0);
  1458.     else
  1459.         thisWindow->wWindow = NewWindow(0,&stagRect,(StringPtr)iTitle,isVisible,
  1460.                 ((iFlags & wZoomable) != 0) ? zoomDocProc : iType,
  1461.                 (WindowPtr)-1,iGoAway!=0,0);
  1462.  
  1463.     SetPort(thisWindow->wWindow);
  1464.  
  1465.     thisWindow->flags = iFlags;
  1466.     thisWindow->iNum = iNum < 0 ? -iNum : iNum;
  1467.     thisWindow->wUpdateProc = iUpdate;
  1468.     thisWindow->wClickProc = iClick;
  1469.     thisWindow->wKeyProc = iKey;
  1470.     thisWindow->wGoAwayProc = iGoAway;
  1471.     thisWindow->wZoomProc = nil;
  1472.     thisWindow->wActivateProc = iActivate;
  1473.     thisWindow->wDeactivateProc = iDeactivate;
  1474.     thisWindow->wIdleProc = iIdle;
  1475.     thisWindow->wResizeProc = nil;
  1476.     thisWindow->wGrowWindowProc = nil;
  1477.     thisWindow->wMoveWindowProc = nil;
  1478.     thisWindow->wEventProc = nil;
  1479.  
  1480. #ifdef BigEasyGXPrinting
  1481.     thisWindow->job = nil;
  1482. #endif
  1483.  
  1484. goHome:
  1485.     return thisWindow->wWindow;
  1486.     }
  1487.  
  1488.  
  1489. #ifdef BigEasyGXPrinting
  1490. void MakeSureWeHaveJob(TEasyWindow *thisWindow)
  1491.     {
  1492.     if(!thisWindow->job)
  1493.         if((thisWindow->flags & wPrintDraw) && gHasGX)
  1494.             {
  1495.             GoWatch();
  1496.             GXNewJob(&thisWindow->job);
  1497.             GoArrow();
  1498.             }
  1499.     }
  1500. #endif
  1501.  
  1502.  
  1503.  
  1504.  
  1505. void UninstallWindow(short iNum)
  1506.     {
  1507.     register TEasyWindow *thisWindow;
  1508.     register beDeactivateProcPtr fp;
  1509.  
  1510.     gCoolDragState = 0;                    /* just in case we were dragging the dissappeared window */
  1511.  
  1512.     if(!(thisWindow = GoodWNum(iNum)))
  1513.         return;
  1514.  
  1515.     SetPort(thisWindow->wWindow);
  1516.  
  1517.     fp = thisWindow->wDeactivateProc;
  1518.     if(fp)
  1519.         (*fp)(iNum);
  1520.     CloseWindow(thisWindow->wWindow);
  1521.     EnDisEdits(-1,-1,-1,-1,-1);
  1522.  
  1523. #ifdef BigEasyGXPrinting
  1524.     if((thisWindow->flags & wPrintDraw) && gHasGX)
  1525.         GXDisposeJob(thisWindow->job);
  1526. #endif
  1527.  
  1528.     thisWindow->wUsed = 0;
  1529.     }
  1530.  
  1531. void Show(short iNum)
  1532.     {
  1533.     register TEasyWindow *thisWindow;
  1534.  
  1535.     thisWindow = GoodWNum(iNum);
  1536.     if(thisWindow)
  1537.         {
  1538.         if(!((WindowPeek)(thisWindow->wWindow))->visible)    /* If so, just show it, and bring it to the front. */
  1539.             ShowWindow(thisWindow->wWindow);
  1540.         SelectWindow(thisWindow->wWindow);
  1541.         }
  1542.     }
  1543.  
  1544. void Hide(short iNum)
  1545. /*
  1546.   * Just do HideWindow to the
  1547.   * specified window number.
  1548.   */
  1549.     {
  1550.     register TEasyWindow *thisWindow;
  1551.  
  1552.     gCoolDragState = 0;                                    /* It might have been this window */
  1553.  
  1554.     thisWindow = GoodWNum(iNum);
  1555.     if(thisWindow)
  1556.         HideWindow(thisWindow->wWindow);
  1557.     }
  1558.  
  1559.     
  1560.  
  1561. void GetWindowRect(short n,Rect *r)
  1562. /*
  1563.   * return the window's current rectangle
  1564.   * in global coördinate space.
  1565.   */
  1566.     {
  1567.     TEasyWindow *thisWindow;
  1568.     WindowPtr g;
  1569.  
  1570.     if(!(thisWindow = GoodWNum(n)))
  1571.         return;
  1572.  
  1573.     if(thisWindow->wUsed)
  1574.         {
  1575.         g = thisWindow->wWindow;
  1576.         SetPort(g);
  1577.         *r = g->portRect;
  1578.         LocalToGlobal((Point *)r);
  1579.         LocalToGlobal((Point *)( (char*)r + 4));
  1580.         }
  1581.     }
  1582.         
  1583. WindowPtr GetWindowPtr(short n)
  1584. /*
  1585.   * return the windowptr for
  1586.   * the specified window number
  1587.   */
  1588.     {
  1589.     TEasyWindow *thisWindow;
  1590.     WindowPtr g;
  1591.  
  1592.     if(!(thisWindow = GoodWNum(n)))
  1593.         g = 0;
  1594.     else
  1595.         g = thisWindow->wWindow;
  1596.  
  1597.     return g;
  1598.     }
  1599.  
  1600. Boolean GetWindowVisible(short n)
  1601. /*
  1602.   * return true if the window exists,
  1603.   * and is visible, or false if its invisible
  1604.   * or doesn't exist.
  1605.   */
  1606.     {
  1607.     register WindowPtr g;
  1608.  
  1609.     g = GetWindowPtr(n);
  1610.     if(g)
  1611.         return ((WindowPeek)g)->visible;
  1612.     else
  1613.         return false;
  1614.     }
  1615.  
  1616. void SaveWindowPosition(short n)
  1617. /*
  1618.   * Save the position of window number n,
  1619.   * or all windows if n = -1;
  1620.   */
  1621.     {
  1622.     Rect **rH;
  1623.     register Rect *r;
  1624.     register short i;
  1625.     register short n1,n2;
  1626.     TEasyWindow *thisWindow;
  1627.  
  1628.     rH = (Rect **)NewHandleClear(sizeof(Rect));
  1629.     FailNil((long)rH);
  1630.     HLock((Handle)rH);
  1631.     r = *rH;
  1632.  
  1633.     if(n < 0)
  1634.         {
  1635.         n1 = 0;
  1636.         n2 = gEasyWindowListSize-1;
  1637.         }
  1638.     else
  1639.         n1 = n2 = n;
  1640.  
  1641.     for(i = n1; i<=n2; i++)
  1642.         {
  1643.         thisWindow = GoodWNum(i);
  1644.         if(thisWindow && thisWindow->wUsed)
  1645.             {
  1646.             GetWindowRect(i,r);
  1647.             if( !((WindowPeek)(thisWindow->wWindow))->visible )
  1648.                 SwapShort(r->left,r->right);
  1649.             Replace1Resource((Handle)rH,kWinPosType,i);
  1650.             }
  1651.         }
  1652.  
  1653.     DisposHandle( (Handle)rH );
  1654.     }
  1655.  
  1656. void ForgetWindowPosition(short n)
  1657. /*
  1658.   * Forget the saved window position n,
  1659.   * or all windows if n<0.
  1660.   */
  1661.     {
  1662.     register short i;
  1663.     register short n1,n2;
  1664.     register TEasyWindow *thisWindow;
  1665.  
  1666.     if(n < 0)
  1667.         {
  1668.         n1 = 0;
  1669.         n2 = gEasyWindowListSize-1;
  1670.         }
  1671.     else
  1672.         n1 = n2 = n;
  1673.  
  1674.     for(i = n1; i<=n2; i++)
  1675.         {
  1676.         thisWindow = GoodWNum(i);
  1677.         if(thisWindow && thisWindow->wUsed)
  1678.             Replace1Resource(0,kWinPosType,i);
  1679.         }
  1680.     }
  1681.  
  1682.  
  1683. void Replace1Resource(Handle h,long type,short id)
  1684. /*
  1685.   * This is AddResource with a
  1686.   * RmveResource if necessary.
  1687.   * Pass h==nil to delete the resource.
  1688.   */
  1689.     {
  1690.     Handle old;
  1691.  
  1692.     /*
  1693.      * A lame hack to prevent writing resources
  1694.      * to a lightspeed project file.
  1695.      */
  1696.     if( *(StringPtr)(0x910 + (*(StringPtr)0x910)) == 'π')
  1697.         {
  1698.         /* do nothing */
  1699.         }
  1700.     else
  1701.         {
  1702.  
  1703.         old = Get1Resource(type,id);
  1704.         if(old)
  1705.             RemoveResource(old);
  1706.         if(h)
  1707.             {
  1708.             AddResource(h,type,id,(StringPtr)"\p");
  1709.             WriteResource(h);
  1710.             DetachResource(h);
  1711.             }
  1712.  
  1713.         }
  1714.     }
  1715.  
  1716. void CheckMenubar(void)
  1717.     {
  1718.     if(gInvalidMenuBar)
  1719.         {
  1720.         DrawMenuBar();
  1721.         gInvalidMenuBar = false;
  1722.         }
  1723.     }
  1724.  
  1725. /*----------------
  1726.     Event Routines
  1727. ----------------*/
  1728.  
  1729. Boolean HandleUpdateEvent(EventRecord *er)
  1730. /*
  1731.  * Update the appropriate window, if we know who it is.
  1732.  */
  1733.     {
  1734.     Boolean result;
  1735.     short wNum;
  1736.     TEasyWindow *thisEasyWindow;
  1737.     WindowPtr w;
  1738.     GrafPtr oldPort;
  1739.  
  1740.     GetPort(&oldPort);
  1741.     result = false;
  1742.  
  1743.     if(er->what != updateEvt)
  1744.         {
  1745.         result = false;
  1746.         goto goHome;
  1747.         }
  1748.  
  1749.     w = (WindowPtr)er->message;
  1750.     wNum = ScanWindowList(w);                    /* other than null or click, scan list        */
  1751.     thisEasyWindow = GoodWNum(wNum);            /* and get record                    */
  1752.  
  1753.     if(thisEasyWindow)
  1754.         {
  1755.         Rect visBounds;
  1756.         beUpdateProcPtr fp;
  1757.  
  1758.         SetPort(w);
  1759.         BeginUpdate(w);
  1760.     
  1761.         result = true;
  1762.         visBounds = (**w->visRgn).rgnBBox;
  1763.         fp = thisEasyWindow->wUpdateProc;
  1764.         if(fp)
  1765.             {
  1766.             SetPort(thisEasyWindow->wWindow);                    /* Set port to window    */
  1767.             (*fp)(wNum);            /* Call drawing proc        */
  1768.             }
  1769.  
  1770.         SetOrigin(0,0);
  1771.  
  1772.         if (thisEasyWindow->flags & wGrowable)            /* Draw growbox, if...    */
  1773.             MyDrawGrowIcon(w);
  1774.  
  1775.         ClipRect(&gBigRect);
  1776.  
  1777.  
  1778.         DrawControls(w);
  1779.         EndUpdate(w);
  1780.         }
  1781.     else
  1782.         result = false;
  1783.  
  1784. goHome:
  1785.  
  1786.     SetPort(oldPort);
  1787.     return result;
  1788.     }
  1789.  
  1790.  
  1791. Boolean ActivateWindow(WindowPtr w, Boolean activate)
  1792.     {
  1793.     Boolean result;
  1794.     short wNum;
  1795.     TEasyWindow *thisEasyWindow;
  1796.     GrafPtr oldPort;
  1797.  
  1798.     GetPort(&oldPort);
  1799.  
  1800.     wNum = ScanWindowList(w);                    /* other than null or click, scan list        */
  1801.     thisEasyWindow = GoodWNum(wNum);            /* and get record                    */
  1802.  
  1803.     if(!thisEasyWindow)
  1804.         {
  1805.         result = false;
  1806.         goto goHome;
  1807.         }
  1808.  
  1809.     result = true;
  1810.  
  1811.     FrontDAEdits();
  1812.  
  1813.     if(thisEasyWindow)
  1814.         {
  1815.         SetPort(thisEasyWindow->wWindow);
  1816.         if(activate)
  1817.             {
  1818.             beActivateProcPtr fp;
  1819.             short copyItem,printItems;
  1820.  
  1821.             if(thisEasyWindow->flags & wCopyDraw)
  1822.                 copyItem = 1;
  1823.             else
  1824.                 copyItem = -1;
  1825.  
  1826.             EnDisEdits(-1,-1,copyItem,-1,-1);
  1827.  
  1828.             if(((thisEasyWindow->flags & wPrintDraw) && gHasGX)
  1829.                     || (gAppPageSetupProc && gAppPrintProc) )
  1830.                 printItems = 1;
  1831.             else
  1832.                 printItems = -1;
  1833.             SetMenuItem(mPageSetup,printItems,0,0,nil);
  1834.             SetMenuItem(mPrint,printItems,0,0,nil);
  1835.  
  1836.             fp = thisEasyWindow->wActivateProc;
  1837.             if(fp)
  1838.                 (*fp)(wNum);
  1839.             }
  1840.         else
  1841.             {
  1842.             beDeactivateProcPtr fp;
  1843.                         
  1844.             EnDisEdits(-1,-1,-1,-1,-1);
  1845.             SetMenuItem(mPageSetup,-1,0,0,nil);
  1846.             SetMenuItem(mPrint,-1,0,0,nil);
  1847.             fp = thisEasyWindow->wDeactivateProc;
  1848.             if(fp)
  1849.                 (*fp)(wNum);
  1850.             }
  1851.  
  1852.         InitCursor();
  1853.         if (thisEasyWindow->flags & wGrowable)            /* Draw growbox, if...    */
  1854.             MyDrawGrowIcon(w);
  1855.         }
  1856.  
  1857. goHome:
  1858.     SetPort(oldPort);
  1859.     return result;
  1860.     }
  1861.  
  1862. Boolean HandleActivateEvent(EventRecord *er)
  1863. /*
  1864.  * Handle it, if we can find out who it is.
  1865.  */
  1866.     {
  1867.     Boolean result;
  1868.  
  1869.     result = true;
  1870.  
  1871.     switch(er->what)
  1872.         {
  1873.         case activateEvt:
  1874.             ActivateWindow((WindowPtr)er->message,er->modifiers & 1);
  1875.             break;        
  1876.  
  1877.         case kOSEvent:
  1878.             switch ((unsigned long) er->message >> 24)    /*  high byte of message  */
  1879.                 {
  1880.                  case kSuspendResumeMessage:
  1881.                     ActivateWindow(FrontWindow(),er->modifiers & 1);
  1882.                     break;
  1883.                 default:
  1884.                     result = false;
  1885.                     break;
  1886.                 }
  1887.             break;
  1888.  
  1889.         default:
  1890.             result = false;
  1891.             break;
  1892.         }
  1893. goHome:
  1894.     return result;
  1895.     }
  1896.  
  1897.  
  1898.  
  1899.  
  1900.  
  1901. void EventLoop(void)
  1902.     {
  1903.     EventRecord er;
  1904.     short i;
  1905.     register short wNum;
  1906.     WindowPtr w;
  1907.     register TEasyWindow *thisEasyWindow;
  1908.     Boolean tookKey,tookEvent;
  1909.  
  1910.     CheckMenubar();
  1911.  
  1912.     WaitNextEvent(0xffff,&er,gSleep,nil);
  1913.         {
  1914.         gLastModifiers = er.modifiers;
  1915.         gLastEventTime = er.when;
  1916.  
  1917.         if(er.what > 5 && er.what < 12)                    /* update event or higher: in message    */
  1918.             w = (WindowPtr)er.message;
  1919.         else
  1920.             w = FrontWindow();                            /* else, use FrontW                    */
  1921.  
  1922.         if(er.what > 1)
  1923.             {
  1924.             wNum = ScanWindowList(w);                    /* other than null or click, scan list        */
  1925.             thisEasyWindow = GoodWNum(wNum);            /* and get record                    */
  1926.             }
  1927.         else
  1928.             thisEasyWindow = 0;
  1929.  
  1930.         SetPort(w);
  1931.  
  1932.         if(thisEasyWindow && thisEasyWindow->wEventProc)
  1933.             (*thisEasyWindow->wEventProc)(wNum,&er,&tookEvent);
  1934.         else
  1935.             tookEvent = 0;
  1936.  
  1937.         if(!tookEvent)
  1938.             switch (er.what)
  1939.                 {
  1940.                 case 0:    /* null event */
  1941.                     break;
  1942.     
  1943.                 case mouseDown:
  1944.                     FrontDAEdits();
  1945.                     DoMouseClick(&er);
  1946.                     break;
  1947.     
  1948.                 case keyDown:
  1949.                 case autoKey:
  1950.                     FrontDAEdits();
  1951.     
  1952.                     tookKey = false;
  1953.                     if( (!gMenuNeedsCmdKey) || (er.modifiers & 256) )
  1954.                         tookKey = DoKeyPress(er.message);
  1955.     
  1956.                     if(!tookKey && ((!gMenuNeedsCmdKey) || (er.modifiers & 256)) )
  1957.                         tookKey = CoolBigEasyCmdKeys(er.message & 0xFF);
  1958.     
  1959.                     if(!tookKey)
  1960.                         if(thisEasyWindow)
  1961.                             {
  1962.                             beKeyProcPtr fp;
  1963.                             
  1964.                             fp = thisEasyWindow->wKeyProc;
  1965.                             if(fp)
  1966.                                 {
  1967.                                 SetPort(thisEasyWindow->wWindow);                /* Set port to window    */
  1968.                                 (*fp)(wNum,            /* Call key proc        */
  1969.                                         (short)(er.message&0xff),            /* with the key */
  1970.                                         (short)((er.message>>8)&0xff),        /* the key code */
  1971.                                         er.modifiers);                        /* and the modifiers */
  1972.                                 }
  1973.                             }
  1974.                     break;
  1975.     
  1976.                 case updateEvt:
  1977.                     HandleUpdateEvent(&er);
  1978.                     break;
  1979.     
  1980.                 case activateEvt:
  1981.                     HandleActivateEvent(&er);
  1982.                     break;
  1983.     
  1984.                 case kOSEvent:
  1985.                     switch ((unsigned long) er.message >> 24)    /*  high byte of message  */
  1986.                         {
  1987.                          case kSuspendResumeMessage:
  1988.                             if(thisEasyWindow)                    /* just like activate event... */
  1989.                                 {
  1990.                                 ActivateWindow(FrontWindow(),
  1991.                                         er.message & kResumeMask);
  1992.                                 }
  1993.                         break;
  1994.                         }
  1995.                     break;
  1996.     
  1997.                 case kHighLevelEvent:
  1998.                     AEProcessAppleEvent(&er);
  1999.                     break;
  2000.                 case diskEvt:
  2001.                     if (er.message & 0xffff0000) {
  2002.                         Point where = {100,100};
  2003.                     //    DIBadMount(where, er.message);
  2004.                     }
  2005.                     break;    
  2006.                 default:
  2007.                     /*Debugger();/**/
  2008.                     ;
  2009.                 }
  2010.         }
  2011.  
  2012.     /*
  2013.       * See if we're doing a fake cool drag-window
  2014.       */
  2015.     if(gCoolDragState)
  2016.         {
  2017.         Point p,q;
  2018.  
  2019.         SetPort(gCoolDragEW->wWindow);
  2020.         GetMouse(&p);
  2021.         LocalToGlobal(&p);
  2022.         if( (p.v!=gCoolDragPoint.v) || (p.h!=gCoolDragPoint.h) )
  2023.             {
  2024.             q.h = gCoolDragEW->wWindow->portRect.left;
  2025.             q.v = gCoolDragEW->wWindow->portRect.top;
  2026.             LocalToGlobal(&q);
  2027.             MoveWindow(gCoolDragEW->wWindow,
  2028.                     q.h+p.h-gCoolDragPoint.h,
  2029.                     q.v+p.v-gCoolDragPoint.v,0);
  2030.             gCoolDragPoint = p;
  2031.  
  2032.                 {
  2033.                 beMoveWindowProcPtr fp;
  2034.  
  2035.                 fp = gCoolDragEW->wMoveWindowProc;
  2036.                 if(fp)
  2037.                     (fp)(gCoolDragWindowNumber);                    
  2038.                 }
  2039.  
  2040.             }
  2041.         if(!Button())
  2042.             gCoolDragState = 0;
  2043.         }
  2044.  
  2045.     SystemTask();
  2046.     w = FrontWindow();
  2047.     if ( w == gLastFrontIdle)                    /* Minor optimization, wins if the same        */
  2048.         wNum = gLastFrontWindowNumber;        /* window is frontmost for a while.            */
  2049.     else
  2050.         {
  2051.         wNum = ScanWindowList(w);
  2052.         gLastFrontIdle = w;
  2053.         gLastFrontWindowNumber = wNum;
  2054.         }
  2055.  
  2056.     if(er.what != mouseDown && er.what != activateEvt && !gQuitApp)    /* anything but a mousedown or [de]activate */
  2057.         {
  2058.         gIdleSeed ++;
  2059.         if(gIdleSeed & 1)    /* every other chance... */
  2060.             for(i = 1; i<gEasyWindowListSize; i++)
  2061.                 {
  2062.                 if(gEasyWindowList[i].wUsed && gEasyWindowList[i].wIdleProc)
  2063.                     {
  2064.                     SetPort(gEasyWindowList[i].wWindow);
  2065.                     (*gEasyWindowList[i].wIdleProc)
  2066.                             ((short)i,(Boolean)(w == gEasyWindowList[i].wWindow));
  2067.                     }
  2068.                 }
  2069.         }
  2070.  
  2071.     if (gMasterIdleProc && !gQuitApp)
  2072.         (*gMasterIdleProc)();
  2073.     }
  2074.  
  2075.  
  2076. Boolean CoolBigEasyCmdKeys(short key)
  2077.     {
  2078.     WindowRecord *w;
  2079.  
  2080.     switch(key)
  2081.         {
  2082.         /*
  2083.          * Rotate active window
  2084.          */
  2085.         case 9:        /* <tab> */
  2086.             w = *(WindowRecord **)0x9D6;        /* windowlist */
  2087.             if(w)
  2088.                 {
  2089.                 while (w->nextWindow)
  2090.                     w = w->nextWindow;
  2091.                 SelectWindow((WindowPtr)w);
  2092.                 }
  2093.             break;
  2094.  
  2095.         default:
  2096.             return false;
  2097.         }
  2098.     return true;
  2099.     }
  2100.  
  2101.  
  2102. void IdleWindow(short n)
  2103. /*
  2104.  * Idle window number n, or
  2105.  * -1 to idle all windows.
  2106.  */    
  2107.     {
  2108.     register short i;
  2109.     short lo,hi;
  2110.     WindowPtr w;
  2111.     register TEasyWindow *ew;
  2112.     GrafPtr oldPort;
  2113.  
  2114.     GetPort(&oldPort);
  2115.  
  2116.     if(n<0)
  2117.         {
  2118.         lo = 1;
  2119.         hi = gEasyWindowListSize;
  2120.         }
  2121.     else
  2122.         {
  2123.         lo = n;
  2124.         hi = n + 1;
  2125.         }
  2126.  
  2127.     w = FrontWindow();
  2128.     ew = &gEasyWindowList[lo];
  2129.  
  2130.     for(i = lo; i < hi; i++)
  2131.         {
  2132.         if(ew->wUsed && ew->wIdleProc)
  2133.             {
  2134.             SetPort(ew->wWindow);
  2135.             (*ew->wIdleProc)((short)i,ew->wWindow == w);
  2136.             }
  2137.         ew++;
  2138.         }
  2139.  
  2140.     SetPort(oldPort);
  2141.     SystemTask();
  2142.     }    
  2143.  
  2144. void MyDrawGrowIcon(WindowPtr w)
  2145.     {
  2146.     Rect r;
  2147.  
  2148.     SetPort(w);
  2149.     GetGrowRect(w,&r);
  2150.     ClipRect(&r);
  2151.     DrawGrowIcon(w);
  2152.     ClipRect(&gBigRect);
  2153.     }
  2154.  
  2155.  
  2156. void SetMasterOpenAppProc(beOpenAppProcPtr openAppProc)
  2157.     {
  2158.     gMasterOpenAppProc = openAppProc;
  2159.     if(gHasAppleEvents)
  2160.         AEInstallEventHandler(kCoreEventClass, kAEOpenApplication,
  2161.                 (AEEventHandlerUPP)BigEasyOpenAppThang, 0, false);
  2162.     }
  2163.  
  2164.  
  2165. void SetMasterOpenDocProc(beOpenDocProcPtr openDocProc)
  2166.     {
  2167.     gMasterOpenDocProc = openDocProc;
  2168.     if(gHasAppleEvents)
  2169.         AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments,
  2170.                 (AEEventHandlerUPP)BigEasyOpenDocThang, 0, false);
  2171.     }
  2172.  
  2173. void SetMasterQuitAppProc(beQuitAppProcPtr quitAppProc)
  2174.     {
  2175.     gMasterQuitAppProc = quitAppProc;
  2176.     }
  2177.  
  2178. pascal OSErr BigEasyOpenAppThang(AppleEvent *theEvent, AppleEvent *reply,long refCon)
  2179.     {
  2180.     #pragma unused (reply,refCon,theEvent)
  2181.     return noErr;
  2182.     }
  2183.  
  2184. pascal OSErr BigEasyOpenDocThang(AppleEvent *message, AppleEvent *reply,long refCon)
  2185.     {
  2186.     FSSpec fSpec;
  2187.     AEDescList docList;
  2188.     long index, itemsInList;
  2189.     Size actualSize;
  2190.     AEKeyword keywd;
  2191.     DescType typeCode;
  2192.     OSErr thisError;
  2193.     #pragma unused (reply,refCon)
  2194.  
  2195.     thisError = AEGetParamDesc(message, keyDirectObject, typeAEList, &docList);
  2196.     if(thisError)
  2197.         goto goHome;
  2198.  
  2199.     thisError = MissedAEParameters(message);
  2200.     if(thisError)
  2201.         goto goHome;
  2202.  
  2203.     thisError = AECountItems(&docList, &itemsInList);
  2204.     if(thisError)
  2205.         goto goHome;
  2206.  
  2207.     for (index = 1; index <= itemsInList; index++)
  2208.         {
  2209.         thisError = AEGetNthPtr(&docList, index, typeFSS, &keywd, &typeCode,
  2210.                     (Ptr)&fSpec, sizeof(FSSpec), &actualSize);
  2211.         if(thisError)
  2212.             goto goHome;
  2213.  
  2214.         if(gMasterOpenDocProc)
  2215.             (*gMasterOpenDocProc)(&fSpec);
  2216.         }
  2217.  
  2218.     thisError = AEDisposeDesc(&docList);
  2219.  
  2220. goHome:
  2221.     return thisError;
  2222.     }
  2223.  
  2224. pascal OSErr BigEasyQuitAppThang(AppleEvent *theEvent, AppleEvent *reply,long refCon)
  2225.     {
  2226.     OSErr thisError;
  2227.     #pragma unused (reply,refCon)
  2228.  
  2229.     thisError = MissedAEParameters(theEvent);
  2230.     if (!thisError)
  2231.         {
  2232.         ++ gQuitApp;
  2233.     
  2234.         if(gMasterQuitAppProc)
  2235.             (*gMasterQuitAppProc)();
  2236.         }
  2237.  
  2238.     return thisError;
  2239.     }
  2240.  
  2241. OSErr MissedAEParameters (AppleEvent *message)
  2242.     {
  2243.     DescType typeCode;
  2244.     Size actualSize;
  2245.     OSErr err;
  2246.  
  2247.     err = AEGetAttributePtr(message, keyMissedKeywordAttr, typeWildCard,
  2248.             &typeCode, nil, 0L, &actualSize);
  2249.     if (err == errAEDescNotFound)
  2250.         return(noErr);
  2251.     return(err = noErr ? errAEEventNotHandled : err);
  2252.     }
  2253.  
  2254.  
  2255.  
  2256.  
  2257. void InitBigEasy(void)
  2258.     {
  2259.     long result;
  2260.  
  2261.     InstallMyExitToShell();
  2262.     gMasterOpenAppProc = nil;
  2263.     gMasterOpenDocProc = nil;
  2264.     gMasterIdleProc = nil;
  2265.     gAboutProc = nil;
  2266.     gQuitApp = false;
  2267.     gMenuNeedsCmdKey = true;
  2268.     gStaggerWindows = true;
  2269.     gWindowsInView = true;
  2270.     gSleep = 0;
  2271.     gInvalidMenuBar = false;
  2272.  
  2273.     gStagStepX = 7;
  2274.     gStagStepY = 7;
  2275.  
  2276.     SetRect(&gBigRect,-16000,-16000,16000,16000);
  2277.  
  2278.     gEasyWindowListH = (TEasyWindow**)NewHandleClear(sizeof(TEasyWindow));
  2279.     HLock((Handle)gEasyWindowListH);
  2280.     gEasyWindowList = *gEasyWindowListH;
  2281.     gEasyWindowList[0].wUsed = 0;
  2282.     gEasyWindowListSize = 1;
  2283.  
  2284.     gLastFrontIdle = (WindowPtr) 0;
  2285.     gLastFrontWindowNumber = -1;
  2286.  
  2287.     gCoolDragState = 0;
  2288.  
  2289.  
  2290. /*
  2291.  * 7.0 Feature stuff
  2292.  */
  2293.     gSystemVersion = (Gestalt('sysv', &result)) ? 0 : result;
  2294.     gHasAppleEvents = (Gestalt(gestaltAppleEventsAttr, &result) ? false : result != 0);
  2295.     gHasColor = (Gestalt('qdrw',&result)) ?
  2296.             false : (result & (1<<gestaltHasDeepGWorlds)) != 0;
  2297.  
  2298.     /*
  2299.      * The quit-app message, if available.
  2300.      */
  2301.     gMasterQuitAppProc = nil;
  2302.     if(gHasAppleEvents)
  2303.         AEInstallEventHandler(kCoreEventClass, kAEQuitApplication,
  2304.                 (AEEventHandlerUPP)BigEasyQuitAppThang, 0, false);
  2305.  
  2306. /*
  2307.  * GX Feature stuff
  2308.  */
  2309.  
  2310. #ifdef BigEasyGXPrinting
  2311.     gHasGX = WantsGX
  2312.             && ( (Gestalt(gestaltGXVersion,&result)) ? false : true );
  2313.  
  2314.     if(gHasGX)
  2315.         {
  2316.         GXEnterGraphics();
  2317.         GXInitPrinting();
  2318.         }
  2319. #else
  2320.     gHasGX = false;
  2321. #endif
  2322.  
  2323.  
  2324.     }
  2325.  
  2326. static void ExitBigEasy(void)
  2327.     {
  2328. #ifdef BigEasyGXPrinting
  2329.     if(gHasGX)
  2330.         {
  2331.         GXExitGraphics();
  2332.         GXExitPrinting();
  2333.         }
  2334. #endif
  2335.     }
  2336.  
  2337. void main(void)
  2338.     {
  2339. #if 0
  2340. #ifdef THINK_C_PROFILE
  2341.     freopen("profile output","w+",stdout);
  2342.  
  2343.     InitProfile(1000,50);
  2344. #endif THINK_C_PROFILE    
  2345. #endif
  2346.  
  2347.     MaxApplZone();
  2348.     MoreMasters();
  2349.     MoreMasters();
  2350.  
  2351.     InitToolbox();
  2352.     StartMenus();
  2353.  
  2354.     InitBigEasy();
  2355.     Bootstrap();
  2356.     
  2357.     #if THINK_C >= 5
  2358.         #if defined(STACK_KILLER) || defined(TIMING_PROFILE)
  2359.             prepStackKiller();        /** slime from HELL **/
  2360.             #ifdef TIMING_PROFILE
  2361.                 InitTimingProfile(150);    /* call depth */
  2362.             #endif TIMING_PROFILE
  2363.         #endif
  2364.     #endif
  2365.  
  2366.     while (!gQuitApp)
  2367.         EventLoop();
  2368.  
  2369.     FlushEvents(0xffff,0);
  2370.  
  2371.     #ifdef TIMING_PROFILE
  2372.         DumpProfile(0, 0, "\ptiming stats");
  2373.     #endif
  2374.  
  2375.     ExitBigEasy();
  2376.  
  2377.     ExitToShell();
  2378.     }
  2379.  
  2380.